inherited FGeraSolicitacaoPPedido: TFGeraSolicitacaoPPedido
  Caption = 'Gera Solicita'#231#227'o (Ponto Pedido)'
  OldCreateOrder = True
  OnClose = FormClose
  OnCreate = FormCreate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 16
  inherited panel2: TPanel
    inherited BtnExec: TBitBtn
      OnClick = BtnExecClick
    end
  end
  inherited pnBg: TPanel
    object Label1: TLabel
      Left = 8
      Top = 8
      Width = 109
      Height = 16
      Caption = 'Tempo de Estoque'
    end
    object Label2: TLabel
      Left = 77
      Top = 33
      Width = 26
      Height = 16
      Caption = 'Dias'
    end
    object Label3: TLabel
      Left = 8
      Top = 64
      Width = 61
      Height = 16
      Caption = 'Solicitante'
    end
    object Label4: TLabel
      Left = 8
      Top = 112
      Width = 37
      Height = 16
      Caption = 'Motivo'
    end
    object edTempoEstoque: TEdit
      Left = 8
      Top = 25
      Width = 65
      Height = 22
      TabOrder = 0
    end
    object dblSolicitante: TDBLookupComboBox
      Left = 8
      Top = 80
      Width = 406
      Height = 22
      KeyField = 'SOLI_CODIGO'
      ListField = 'SOLI_NOME'
      ListSource = dsSolicitante
      TabOrder = 4
    end
    object dblMotivo: TDBLookupComboBox
      Left = 8
      Top = 128
      Width = 406
      Height = 22
      KeyField = 'MOTI_CODIGO'
      ListField = 'MOTI_DESCRICAO'
      ListSource = dsMotivo
      TabOrder = 5
    end
    object gbCK: TGroupBox
      Left = 144
      Top = 8
      Width = 129
      Height = 57
      Caption = ' Comp'#245'e KIT '
      TabOrder = 1
      object cbCKSim: TCheckBox
        Left = 8
        Top = 24
        Width = 41
        Height = 17
        Caption = 'Sim'
        TabOrder = 0
      end
      object cbCKNao: TCheckBox
        Left = 72
        Top = 24
        Width = 49
        Height = 17
        Caption = 'N'#227'o'
        TabOrder = 1
      end
    end
    object gbMR: TGroupBox
      Left = 280
      Top = 8
      Width = 135
      Height = 58
      Caption = ' Mercado na Rede '
      TabOrder = 2
      object cbMRSim: TCheckBox
        Left = 8
        Top = 24
        Width = 57
        Height = 17
        Caption = 'Sim'
        TabOrder = 0
      end
      object cbMRNao: TCheckBox
        Left = 64
        Top = 24
        Width = 49
        Height = 17
        Caption = 'N'#227'o'
        TabOrder = 1
      end
    end
    object gbContManutencao: TGroupBox
      Left = 421
      Top = 8
      Width = 166
      Height = 94
      Caption = ' Controle Manuten'#231#227'o '
      TabOrder = 3
      object cbComponentes: TCheckBox
        Left = 8
        Top = 24
        Width = 105
        Height = 17
        Caption = 'Componentes'
        TabOrder = 0
      end
      object cbOutros: TCheckBox
        Left = 9
        Top = 68
        Width = 65
        Height = 17
        Caption = 'Outros'
        TabOrder = 1
      end
      object cbPneu: TCheckBox
        Left = 8
        Top = 46
        Width = 57
        Height = 17
        Caption = 'Pneu'
        TabOrder = 2
      end
    end
  end
  object dsCadastro: TDataSource
    AutoEdit = False
    DataSet = cdsCadastro
    Left = 512
    Top = 56
  end
  object QCadastro: TQuery
    DatabaseName = 'base'
    SQL.Strings = (
      'SELECT '
      '*'
      'FROM'
      '  SOLICITACAO')
    Left = 512
    Top = 96
  end
  object dspCadastro: TDataSetProvider
    DataSet = QCadastro
    Constraints = True
    Left = 512
    Top = 136
  end
  object cdsCadastro: TClientDataSet
    Active = True
    Aggregates = <>
    Params = <>
    ProviderName = 'dspCadastro'
    Left = 512
    Top = 176
    object cdsCadastroSOL_CODIGO: TIntegerField
      Alignment = taCenter
      DisplayLabel = 'C'#243'digo'
      FieldName = 'SOL_CODIGO'
    end
    object cdsCadastroSOL_DATA: TDateTimeField
      DisplayLabel = 'Data'
      FieldName = 'SOL_DATA'
    end
    object cdsCadastroSOL_SOLICITANTE: TIntegerField
      DisplayLabel = 'Solicitante'
      FieldName = 'SOL_SOLICITANTE'
    end
    object cdsCadastroSOL_CENTROCUSTO: TIntegerField
      DisplayLabel = 'Centro de Custo'
      FieldName = 'SOL_CENTROCUSTO'
    end
    object cdsCadastroSOL_MOTIVO: TIntegerField
      DisplayLabel = 'Motivo'
      FieldName = 'SOL_MOTIVO'
    end
    object cdsCadastroSOL_TIPO: TStringField
      DisplayLabel = 'Tipo'
      DisplayWidth = 20
      FieldName = 'SOL_TIPO'
      FixedChar = True
      Size = 1
    end
    object cdsCadastroSOL_ORIGEM: TStringField
      DisplayLabel = 'Origem'
      DisplayWidth = 20
      FieldName = 'SOL_ORIGEM'
      FixedChar = True
      Size = 1
    end
    object cdsCadastroUSUARIO_CADASTRO: TStringField
      FieldName = 'USUARIO_CADASTRO'
    end
    object cdsCadastroUSUARIO_AUTERACAO: TStringField
      FieldName = 'USUARIO_AUTERACAO'
    end
    object cdsCadastroUSUARIO_EXCLUSAO: TStringField
      FieldName = 'USUARIO_EXCLUSAO'
    end
    object cdsCadastroDATA_CADASTRO: TDateTimeField
      FieldName = 'DATA_CADASTRO'
    end
    object cdsCadastroDATA_EXCLUSAO: TDateTimeField
      FieldName = 'DATA_EXCLUSAO'
    end
    object cdsCadastroDATA_AUTERACAO: TDateTimeField
      FieldName = 'DATA_AUTERACAO'
    end
    object cdsCadastroEXCLUIDO: TStringField
      FieldName = 'EXCLUIDO'
      FixedChar = True
      Size = 1
    end
    object cdsCadastroSOL_SOLICITANTE_DESC: TStringField
      DisplayLabel = 'Solicitante'
      FieldName = 'SOL_SOLICITANTE_DESC'
      Size = 40
    end
    object cdsCadastroSOL_CENTROCUSTO_DESC: TStringField
      DisplayLabel = 'Centro de Custo'
      FieldName = 'SOL_CENTROCUSTO_DESC'
      Size = 60
    end
    object cdsCadastroSOL_MOTIVO_DESC: TStringField
      DisplayLabel = 'Motivo'
      FieldName = 'SOL_MOTIVO_DESC'
      Size = 40
    end
    object cdsCadastroSOL_VALIDACAO: TStringField
      FieldName = 'SOL_VALIDACAO'
      FixedChar = True
      Size = 1
    end
    object cdsCadastroSOL_SITUACAO: TStringField
      FieldName = 'SOL_SITUACAO'
      FixedChar = True
      Size = 1
    end
  end
  object dsItensSolicitacao: TDataSource
    AutoEdit = False
    DataSet = cdsItensSolicitacao
    Left = 544
    Top = 56
  end
  object QItensSolicitacao: TQuery
    DatabaseName = 'base'
    DataSource = dsCadastro
    SQL.Strings = (
      'SELECT '
      '*'
      'FROM'
      '  ITENSSOLICITACAO'
      'WHERE'
      '  ITENSSOLICITACAO.ITENSSOL_SOL_CODIGO = :SOL_CODIGO'
      '  ')
    Left = 544
    Top = 96
    ParamData = <
      item
        DataType = ftInteger
        Name = 'ITENSSOL_SOL_CODIGO'
        ParamType = ptUnknown
        Value = 1
      end>
  end
  object dspItensSolicitacao: TDataSetProvider
    DataSet = QItensSolicitacao
    Constraints = True
    Left = 544
    Top = 136
  end
  object cdsItensSolicitacao: TClientDataSet
    Active = True
    Aggregates = <>
    IndexFieldNames = 'ITENSSOL_SOL_CODIGO'
    MasterFields = 'SOL_CODIGO'
    MasterSource = dsCadastro
    PacketRecords = 0
    Params = <>
    ProviderName = 'dspItensSolicitacao'
    Left = 544
    Top = 176
    object cdsItensSolicitacaoITENSSOL_PRODCODIGO: TIntegerField
      Alignment = taCenter
      DisplayLabel = 'C'#243'digo'
      FieldName = 'ITENSSOL_PRODCODIGO'
    end
    object cdsItensSolicitacaoFITENSSOL_QTD: TIntegerField
      Alignment = taCenter
      DisplayLabel = 'Quantidade'
      DisplayWidth = 100
      FieldName = 'FITENSSOL_QTD'
    end
    object cdsItensSolicitacaoITENSSOL_OBS: TStringField
      DisplayLabel = 'Observa'#231#227'o'
      FieldName = 'ITENSSOL_OBS'
      Size = 100
    end
    object cdsItensSolicitacaoITENSSOL_PEDCODIGO: TIntegerField
      Alignment = taLeftJustify
      DisplayLabel = 'Pedido'
      FieldName = 'ITENSSOL_PEDCODIGO'
    end
    object cdsItensSolicitacaoITENSSOL_QTDPEDIDO: TIntegerField
      Alignment = taCenter
      DisplayLabel = 'QTD Pedido'
      FieldName = 'ITENSSOL_QTDPEDIDO'
    end
    object cdsItensSolicitacaoITENSSOL_CODIGO: TIntegerField
      FieldName = 'ITENSSOL_CODIGO'
    end
    object cdsItensSolicitacaoITENSSOL_SOL_CODIGO: TIntegerField
      FieldName = 'ITENSSOL_SOL_CODIGO'
    end
    object cdsItensSolicitacaoUSUARIO_CADASTRO: TStringField
      FieldName = 'USUARIO_CADASTRO'
    end
    object cdsItensSolicitacaoUSUARIO_AUTERACAO: TStringField
      FieldName = 'USUARIO_AUTERACAO'
    end
    object cdsItensSolicitacaoUSUARIO_EXCLUSAO: TStringField
      FieldName = 'USUARIO_EXCLUSAO'
    end
    object cdsItensSolicitacaoDATA_CADASTRO: TDateTimeField
      FieldName = 'DATA_CADASTRO'
    end
    object cdsItensSolicitacaoDATA_EXCLUSAO: TDateTimeField
      FieldName = 'DATA_EXCLUSAO'
    end
    object cdsItensSolicitacaoDATA_AUTERACAO: TDateTimeField
      FieldName = 'DATA_AUTERACAO'
    end
    object cdsItensSolicitacaoEXCLUIDO: TStringField
      FieldName = 'EXCLUIDO'
      FixedChar = True
      Size = 1
    end
    object cdsItensSolicitacaoITENSSOL_PROD_DESC: TStringField
      DisplayLabel = 'Produto'
      FieldName = 'ITENSSOL_PROD_DESC'
      Size = 60
    end
  end
  object dsMotivo: TDataSource
    DataSet = DMGestao.QMotivoSolicitacao
    Left = 448
    Top = 192
  end
  object dsSolicitante: TDataSource
    DataSet = DMGestao.QSolicitante
    Left = 448
    Top = 160
  end
  object QPesquisa: TQuery
    DatabaseName = 'base'
    Left = 264
    Top = 104
  end
end
